Wonders of the Modern World/MODERN.iso/pc/program/logo.dxr/Internal (lingo)_1.ls

Text File | 2000-06-19 | 257 b | 23 lines

on startMovie
  cursor(-1)
  clearGlobals()
end

on stopMovie
  cursor(4)
  clearGlobals()
  unLoad()
end

on mouseDown
  global gbMouseDownScript
  if gbMouseDownScript = 1 then
    iEscapeLogo()
  end if
end

on iEscapeLogo
  cursor(4)
  go("escape")
end